home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #6 / Amiga Plus CD - 1996 - No. 06.iso / pd / daten / megabook / storage / dialdata / term.mbrx < prev    next >
Text File  |  1996-06-27  |  677b  |  34 lines
  1. /*
  2. ** Term Dialer for MegaBook 3
  3. ** By Tom Bampton
  4. **
  5. ** © 1996 Eden Software
  6. **
  7. ** This is the script run when the Dial Data option is selected from the
  8. ** Extras menu, please see the docs for creating your own script to dial
  9. ** through your terminal program.
  10. */
  11.  
  12. /*
  13.    Path to Term, it's run if Term isn't running
  14.    Change this to the path of your copy of Term
  15. */
  16. TermPath = 'Dh1:Term/Term'
  17.  
  18. parse arg Number
  19.  
  20. /* Check if Term is running, if not, run it */
  21. if ~show('P', 'TERM') then do
  22.     address command
  23.     'run >nil: ' TermPath
  24.     /* Wait for the ARexx port */
  25.     do 5 while ~show('P', 'TERM')
  26.         'sys:rexxc/waitforport TERM'
  27.     end
  28. end
  29.  
  30. address 'TERM'
  31. options results
  32.  
  33. Dial Number
  34.